home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / Helpfile / GUICtrlCreateRadio.au3 < prev    next >
Encoding:
Text File  |  2006-06-17  |  852 b   |  21 lines
  1. #include <GUIConstants.au3>
  2. GUICreate("My GUI radio") ; will create a dialog box that when displayed is centered
  3.  
  4. $radio1 = GUICtrlCreateRadio ("Radio 1", 10, 10, 120, 20)
  5. $radio2 = GUICtrlCreateRadio ("Radio 2", 10, 40, 120, 20)
  6. GUICtrlSetState ($radio2, $GUI_CHECKED)
  7.  
  8. GUISetState ()      ; will display an  dialog box with 1 checkbox
  9.  
  10. ; Run the GUI until the dialog is closed
  11. While 1
  12.     $msg = GUIGetMsg()
  13.     Select
  14.         Case $msg = $GUI_EVENT_CLOSE
  15.             ExitLoop
  16.         Case $msg = $radio1 And BitAND(GUICtrlRead($radio1), $GUI_CHECKED) = $GUI_CHECKED
  17.             MsgBox(64, 'Info:', 'You clicked the Radio 1 and it is Checked.')
  18.         Case $msg = $radio2 And BitAND(GUICtrlRead($radio2), $GUI_CHECKED) = $GUI_CHECKED
  19.             MsgBox(64, 'Info:', 'You clicked on Radio 2 and it is Checked.')
  20.     EndSelect
  21. Wend